(*Este es para probar las cadenas y los caracteres, y los punteros de regalo*)
program Prueba;
  var estrin : String;
begin
	A := A+B;
	{esto seria un hexadecimal}
	estrin := 12;
    {esto seria un codigo ASCII}
    b := 126;
END.